home *** CD-ROM | disk | FTP | other *** search
/ Revista CD Expert 37 / CD Expert nº 37.iso / LastCall / lastcall.exe / stuff / recipe.dxr / 00030_Default help text in green.ls < prev    next >
Encoding:
Text File  |  2000-03-23  |  313 b   |  18 lines
  1. property pSpr
  2.  
  3. on beginSprite me
  4.   pSpr = sprite(me.spriteNum)
  5.   customFont(pSpr.member)
  6.   mRefresh(me, "Move the mouse cursor over an item")
  7. end
  8.  
  9. on mRefresh me, newText
  10.   if not isText(pSpr) then
  11.     exit
  12.   end if
  13.   if voidp(newText) or (newText = EMPTY) then
  14.     exit
  15.   end if
  16.   pSpr.member.text = newText
  17. end
  18.